home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / tcppt1.arc / PTREALOC.BAT < prev    next >
Encoding:
DOS Batch File  |  1990-09-07  |  2.1 KB  |  84 lines
  1. echo off
  2. if not exist FARHEAP.OBS goto ERROR_NOOBJ
  3. if not exist NEARHEAP.OBS goto ERROR_NOOBJ
  4.  
  5. if not exist %1cs.lib goto NOSMALLLIB
  6. echo Patching small library...
  7. copy FARHEAP.OBS FARHEAP.OBJ
  8. tlib %1cs.lib +- FARHEAP.OBJ
  9. del FARHEAP.OBJ
  10. copy NEARHEAP.OBS NEARHEAP.OBJ
  11. tlib %1cs.lib +- NEARHEAP.OBJ
  12. del NEARHEAP.OBJ
  13. if errorlevel 1 goto ERROR_NOTLIB
  14. goto MEDIUM
  15. :NOSMALLLIB
  16. echo Cannot find CS.LIB to patch small library.
  17.  
  18. :MEDIUM
  19. if not exist %1cm.lib goto NOMEDLIB
  20. echo Patching medium library...
  21. copy FARHEAP.OBM FARHEAP.OBJ
  22. tlib %1cm.lib +- FARHEAP.OBJ
  23. del FARHEAP.OBJ
  24. copy NEARHEAP.OBM NEARHEAP.OBJ
  25. tlib %1cm.lib +- NEARHEAP.OBJ
  26. del NEARHEAP.OBJ
  27. goto COMPACT
  28. :NOMEDLIB
  29. echo Cannot find CM.LIB to patch medium library.
  30.  
  31. :COMPACT
  32. if not exist %1cc.lib goto NOCOMPACTLIB
  33. echo Patching compact library...
  34. copy FARHEAP.OBC FARHEAP.OBJ
  35. tlib %1cc.lib +- FARHEAP.OBJ
  36. del FARHEAP.OBJ
  37. copy NEARHEAP.OBC NEARHEAP.OBJ
  38. tlib %1cc.lib +- NEARHEAP.OBJ
  39. del NEARHEAP.OBJ
  40. goto LARGE
  41. :NOCOMPACTLIB
  42. echo Cannot find CC.LIB to patch compact library.
  43.  
  44. :LARGE
  45. if not exist %1cl.lib goto NOLARGELIB
  46. echo Patching large library...
  47. copy FARHEAP.OBL FARHEAP.OBJ
  48. tlib %1cl.lib +- FARHEAP.OBJ
  49. del FARHEAP.OBJ
  50. copy NEARHEAP.OBL NEARHEAP.OBJ
  51. tlib %1cl.lib +- NEARHEAP.OBJ
  52. del NEARHEAP.OBJ
  53. goto HUGE
  54. :NOLARGELIB
  55. echo Cannot find CL.LIB to patch large library.
  56.  
  57. :HUGE
  58. if not exist %1ch.lib goto NOHUGELIB
  59. echo Patching huge library...
  60. copy FARHEAP.OBH FARHEAP.OBJ
  61. tlib %1ch.lib +- FARHEAP.OBJ
  62. del FARHEAP.OBJ
  63. copy NEARHEAP.OBH NEARHEAP.OBJ
  64. tlib %1ch.lib +- NEARHEAP.OBJ
  65. del NEARHEAP.OBJ
  66. goto DONE
  67. :NOHUGELIB
  68. echo Cannot find CH.LIB to patch huge library.
  69. goto DONE
  70.  
  71. :ERROR_NOOBJ
  72. echo The patch object module FARHEAP or NEARHEAP is not in the current
  73. echo directory.  Cannot patch libraries.
  74. goto DONE
  75.  
  76. :ERROR_NOTLIB
  77. echo A problem was encountered executing TLIB.  Either the Turbo Librarian
  78. echo cannot be located along your DOS path, or an error occurred.  Consult
  79. echo your Turbo C++ Users Guide for more information on why TLIB might not
  80. echo be operating correctly.
  81.  
  82. :DONE
  83. echo Done.
  84.